home *** CD-ROM | disk | FTP | other *** search
/ APC & TCP 4 / APC & TCP 4.iso / games / publicdomain / a / asteroids2 / rotx / asm / aim.asm next >
Assembly Source File  |  1995-07-20  |  1KB  |  100 lines
  1. ;
  2. ;     my first fucking assembly code
  3. ;
  4. ;        d0 dx
  5. ;       d1 dy
  6. ;       a0 dxdy
  7. ;        a1 dydx
  8. ;
  9.  
  10.     xdef        _determineaim
  11.  
  12.     section code
  13.  
  14. _determineaim:
  15.  
  16.     cmp.L        #0,d0
  17.     blt xltzero                    ; is x less than zero ?
  18.     cmp.L        #0,d1
  19.     blt xgyl                    ; x is greater and y is less
  20.     bra xgyg                    ; else x and y are greater than zero 
  21.  
  22. xltzero:
  23.     cmp.L        #0,d1
  24.     blt xlyl                    ; x and y are less than zero
  25.     bra xlyg                    ; x is less and y is greater than zero
  26.  
  27.  
  28. xgyl:
  29.     move.L        #0,d0
  30.     bra usedxdy
  31. xgyg:
  32.     move.L        #8,d0
  33.     bra usedydx
  34. xlyg:
  35.     move.L        #16,d0
  36.     bra usedxdy
  37. xlyl:
  38.     move.L        #24,d0
  39.     bra usedydx
  40.  
  41.  
  42. usedxdy:
  43.     cmp.L        #101,a0
  44.     bgt addeight
  45.     cmp.L         #33,a0
  46.     bgt addseven
  47.     cmp.L         #19,a0
  48.     bgt addsix
  49.     cmp.L         #12,a0
  50.     bgt addfive
  51.     cmp.L          #8,a0
  52.     bgt addfour
  53.     cmp.L          #5,a0
  54.     bgt addthree
  55.     cmp.L          #3,a0
  56.     bgt addtwo
  57.     cmp.L          #1,a0
  58.     bgt addone
  59.     rts
  60.  
  61. usedydx:
  62.     cmp.L        #101,a1
  63.     bgt addeight
  64.     cmp.L         #33,a1
  65.     bgt addseven
  66.     cmp.L         #19,a1
  67.     bgt addsix
  68.     cmp.L         #12,a1
  69.     bgt addfive
  70.     cmp.L          #8,a1
  71.     bgt addfour
  72.     cmp.L          #5,a1
  73.     bgt addthree
  74.     cmp.L          #3,a1
  75.     bgt addtwo
  76.     cmp.L          #1,a1
  77.     bgt addone
  78.     rts
  79.  
  80.  
  81. addeight:
  82.     add.L        #1,d0
  83. addseven:
  84.     add.L        #1,d0
  85. addsix:
  86.     add.L        #1,d0
  87. addfive:
  88.     add.L        #1,d0
  89. addfour:
  90.     add.L        #1,d0
  91. addthree:
  92.     add.L        #1,d0
  93. addtwo:
  94.     add.L        #1,d0
  95. addone:
  96.     add.L        #1,d0
  97.  
  98.     rts
  99.  
  100.     END